0 POKE53280,0:POKE53281,0:PRINT"[147][154]";
1 PRINT"[196]IESER [212]RANSFERE-[194]EFEHL KANN AN BELIE-
2 [153]"BIGER (null)TELLE IM (null)AMSPEICHER STEHEN.
3 PRINT"[197]R IST VIELSEITIG UND UNIVERSELLE EIN-
4 [153]"SETZBAR UND VERMAG DIE GESAMTEN
5 PRINT"84 (IN [215]ORTEN:[214]IERUNDACHTSIG !)
6 [153]"(null)PEEKYTE (null)PEICHER DES LEN64 BELIEBIG ZU
7 PRINT"VERSCHIEBEN.
8 [153]"STR$IE ATNNWENDUNG LAUTET:
9 PRINT"SYS [216],[211],[197],[218],[208]1
10 [153]"(null) = (null)PEICHERADRESSE DER (null)LEN-(null)OUTINE
11 PRINT"[211] = [211]TARTADRESSE DER [214]ERSCHIEBUNG
12 [153]"VAL = VALNDADRESSE DER (null)ERSCHIEBUNG
13 PRINT"[218] = [218]IELADRESSE DER [214]ERSCHIEBUNG
14 [153]"(null)1= (null)ERT VON (null)PEICHERADRESSE 1
15 PRINT"    55 = [210]OM
16 [153]"    54 = (null)OM / PEEKASIC (null)AM
17 PRINT"    53 = [210]OM / [194]ASIC [210]AM / [203]ERNAL [210]AM
18 [153]"    52 = ATNLLES (null)AM
19 PRINT"    USW. ([211]IEHE [204]ITERATUR)
20 [153]"Z.PEEK. SYS (null),1024,2023,40960,54
21 DATA32,253,174,32,138,173,32,247,183,132,251,133,252,32,253,174,32,138,173
22 DATA32,247,183,140,60,3,141,61,3,32,253,174,32,138,173,32,247,183,132,253
23 DATA133,254,32,253,174,32,158,183,173,32,208,133,2,120,134,1,160,0,177,251
24 DATA145,253,141,24,212,141,32,208,165,252,205,61,3,208,23,165,251,205,60,3
25 DATA208,16,169,55,133,1,88,169,0,141,24,212,165,2,141,32,208,96,230,251,230
26 DATA253,165,251,208,2,230,252,165,253,208,202,230,254,160,0,152,240,195
27 PRINT"     LEGT DEN [194]ILDSCHIRM IM [210]AM UNTER
28 [153]"     DEM PEEKASICROM AB.
29 GETA$:IFA$=""THEN29
30 PRINT"[147][194]ITTE DIE [211]TARTADRESSE FUER DIE
31 [153]"(null)ASCHINENROUTINE ANGEBEN.
32 PRINT"(ZWISCHEN 4000  UND 40800) ODER
35 [153]"(ZWISCHEN 49152 UND 53000)
36 SA=0:INPUT"[211]TARTADRESSE";SA
37 IFSA<4000THEN36
38 IFSA>40800ANDSA<49152THEN36
39 IFSA>53000THEN36
40 FORT=0TO117:READQ:POKESA+T,Q:NEXT:EA=SA+117
41 Y1=INT(SA/256):X1=SA-(Y1*256)
42 Y2=INT(EA/256):X2=EA-(Y2*256)
43 N$="":INPUT"[211]PEICHERFILENAME";N$
44 IFN$=""THEN43
45 SYS57812N$,8
46 POKE193,X1:POKE194,Y1
47 POKE174,X2:POKE175,Y2
48 SYS62954
49 PRINT"[204]AGE DER [212]RANS-[210]OUTINE:"SA"-"EA"
50 [153]"(null)ADEN MIT ',8,1'
51 PRINT"[198]UNKTION: SYS"SA",[211],[197],[218],[208]1
52 [153]"(LEN) 1989 (null)AURIEN (null)OFTWARE LEN(null)